home *** CD-ROM | disk | FTP | other *** search
/ Network Support Library / RoseWare - Network Support Library.iso / btrieve / btr510.exe / PATCH510.CMD < prev    next >
OS/2 REXX Batch file  |  1992-08-19  |  4KB  |  161 lines
  1. echo off
  2. CLS
  3. echo *** MAKE SURE THAT YOU USE THE ORIGINAL (UNPATCHED) RELEASED VERSION
  4. echo     OF THE PRODUCT YOU ARE PATCHING.   PATCHING AN ALREADY PATCHED COPY
  5. echo     MAY CAUSE UNPREDICTABLE ERRORS.
  6. echo  
  7. echo     This batch file is for patching VERSION 5.10 products ONLY
  8. echo  
  9. ::
  10. :TESTNEXT
  11. IF  %1! == ! GOTO PARAM
  12. IF  %1 == BTRNLM   GOTO BTRNLM
  13. IF  %1 == BTRDOS   GOTO BTRDOS
  14. IF  %1 == BSERVER  GOTO BSERVER
  15. IF  %1 == BROUTER  GOTO BROUTER
  16. IF  %1 == BREQUEST GOTO BREQUES
  17. IF  %1 == BTRCALLS GOTO BTRCALL
  18. IF  %1 == BTROS2   GOTO BTROS2
  19. IF  %1 == WBTRCALL GOTO WINDOWS
  20. IF  %1 == BTRTOOLS GOTO BTRTOOL
  21. IF  %1 == BUTIL    GOTO BUTIL
  22. ::
  23. IF  %1 == btrnlm   GOTO BTRNLM
  24. IF  %1 == btrdos   GOTO BTRDOS
  25. IF  %1 == bserver  GOTO BSERVER
  26. IF  %1 == brouter  GOTO BROUTER
  27. IF  %1 == brequest GOTO BREQUES
  28. IF  %1 == btrcalls GOTO BTRCALL
  29. IF  %1 == btros2   GOTO BTROS2
  30. IF  %1 == wbtrcall GOTO WINDOWS
  31. IF  %1 == btrtools GOTO BTRTOOL
  32. IF  %1 == butil    GOTO BUTIL
  33. GOTO PARAM
  34. ::
  35. :BTRNLM
  36. SET FILE510=BTRIEVE.NLM
  37. SET ORG510=%1.ORG
  38. SET PAT510=BPATNLM.510
  39. GOTO PATCH
  40. ::
  41. :BTRDOS
  42. SET FILE510=BTRIEVE.EXE
  43. SET ORG510=%1.ORG
  44. SET PAT510=BPATDOS.51A
  45. GOTO PATCH
  46. ::
  47. :BSERVER
  48. SET FILE510=BSERVER.VAP
  49. SET ORG510=%1.ORG
  50. SET PAT510=BPATVAP.510
  51. GOTO PATCH
  52. ::
  53. :BROUTER
  54. SET FILE510=BROUTER.VAP
  55. SET ORG510=%1V.ORG
  56. SET PAT510=BPATRTR.510
  57. GOTO PATCH
  58. ::
  59. :BREQUES
  60. SET FILE510=BREQUEST.EXE
  61. SET ORG510=%1.ORG
  62. SET PAT510=BPATREQ.510
  63. GOTO PATCH
  64. ::
  65. :BTRCALL
  66. SET FILE510=BTRCALLS.DLL
  67. SET ORG510=%1.ORG
  68. SET PAT510=BPATREQO.510
  69. GOTO PATCH
  70. ::
  71. :BTROS2
  72. SET FILE510=BTRCALLS.DLL
  73. SET ORG510=BTRCALLS.OS2
  74. SET PAT510=BPATOS2.510
  75. GOTO PATCH
  76. ::
  77. :WINDOWS
  78. SET FILE510=WBTRCALL.DLL
  79. SET ORG510=%1.ORG
  80. SET PAT510=BPATWIN.510
  81. GOTO PATCH
  82. ::
  83. :BTRTOOL
  84. SET FILE510=BTRTOOLS.EXE
  85. SET ORG510=%1.ORG
  86. SET PAT510=WTOOLPAT.510
  87. GOTO PATCH
  88. ::
  89. :BUTIL
  90. SET FILE510=BUTIL.EXE
  91. SET ORG510=%1.ORG
  92. SET PAT510=BPATUT.510
  93. GOTO PATCH
  94. ::
  95. ::
  96. ::  BEGIN PATCHING FILES
  97. ::
  98. :PATCH
  99. IF NOT EXIST PI.EXE GOTO NOPI
  100. IF NOT EXIST %PAT510% GOTO NOPAT
  101. IF NOT EXIST %FILE510% GOTO NOFILE
  102. IF NOT EXIST %ORG510% REN %FILE510% %ORG510%
  103. IF EXIST %FILE510% DEL %FILE510%
  104. :INPATCH
  105. echo  
  106. echo %FILE510%  ** PATCHING ..........
  107. echo  
  108. COPY %ORG510% %1
  109. PI %1 %PAT510%
  110. REN %1 %FILE510%
  111. GOTO FIXDONE
  112. ::
  113. :NOPAT
  114. echo  
  115. echo CANNOT FIND %PAT510%
  116. GOTO END
  117. ::
  118. :NOPI
  119. echo  
  120. echo CANNOT FIND PI.EXE
  121. echo  
  122. echo The Novell Patch Install Utility (PI.EXE) is required to install
  123. echo the patches for this product.  Please copy PI.EXE to the directory
  124. echo you are working in............................................
  125. GOTO END
  126. ::
  127. :NOFILE
  128. IF EXIST %ORG510% GOTO INPATCH
  129. echo  
  130. echo CANNOT FIND %FILE510%
  131. GOTO END
  132. ::
  133. :PARAM
  134. IF %1! == ! CLS
  135. echo THE FORMAT IS:
  136. echo  
  137. echo PATCH510 [filename]
  138. echo  
  139. echo WHERE [filename] IS:     - BTRNLM   ........ BTRIEVE.NLM
  140. echo                          - BTRDOS   ........ BTRIEVE.EXE
  141. echo                          - BSERVER  ........ BSERVER.VAP
  142. echo                          - BROUTER  ........ BROUTER.VAP
  143. echo                          - BREQUEST ........ BREQUEST.EXE
  144. echo                          - BTRCALLS ........ BTRCALLS.DLL {REQ}
  145. echo                          - BTROS2   ........ BTRCALLS.DLL {LOCAL VERSION}
  146. echo                          - WBTRCALL ........ WBTRCALL.DLL
  147. echo                          - BTRTOOLS ........ BTRTOOLS.EXE
  148. echo                          - BUTIL    ........ BUTIL.EXE
  149. echo  
  150. GOTO END
  151. ::
  152. :FIXDONE
  153. echo  
  154. echo BTRIEVE PRODUCT ** PATCH COMPLETE **
  155. echo  
  156. ::
  157. :END
  158. SET FILE510=
  159. SET ORG510=
  160. SET PAT510=
  161.